﻿Public Class Salario

    Dim m_codigoEmpleado As String
    Dim m_fecha As Date
    Dim m_salarioBruto As Double
    Dim m_salarioNeto As Double
    Dim m_bonoValor As Double

    ''' <summary>
    ''' Crea un constructor vacio
    ''' </summary>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Sub New()

    End Sub

    ''' <summary>
    ''' Constructor el cual resive todos los datos
    ''' </summary>
    ''' <param name="p_codigoEmpleado">Codigo del empleado</param>
    ''' <param name="p_fecha">fecha</param>
    ''' <param name="p_salarioBruto">salario bruto</param>
    ''' <param name="p_salarioNeto">salario neto</param>
    ''' <param name="p_bonoValor">valor de la binificación</param>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Sub New(ByVal p_codigoEmpleado As String, ByVal p_fecha As String, ByVal p_salarioBruto As Double, ByVal p_salarioNeto As Double, ByVal p_bonoValor As Double)

        m_codigoEmpleado = p_codigoEmpleado
        m_fecha = p_fecha
        m_salarioBruto = p_salarioBruto
        m_salarioNeto = p_salarioNeto
        m_bonoValor = p_bonoValor

    End Sub

    ''' <summary>
    ''' Set/Get codigo del empleado
    ''' </summary>
    ''' <value>codigo del empleado</value>
    ''' <returns>String</returns>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Public Property codigoEmpleadoS() As String
        Get
            Return m_codigoEmpleado
        End Get
        Set(ByVal p_codigoEmpleado As String)
            m_codigoEmpleado = p_codigoEmpleado
        End Set
    End Property

    ''' <summary>
    ''' Set/Get fecha
    ''' </summary>
    ''' <value>Fecha</value>
    ''' <returns>Date</returns>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Public Property fechaS() As Date
        Get
            Return m_fecha
        End Get
        Set(ByVal p_fecha As Date)
            m_fecha = p_fecha
        End Set
    End Property

    ''' <summary>
    ''' Set/Get salario bruto del empleado
    ''' </summary>
    ''' <value>Salario Bruto</value>
    ''' <returns>Double</returns>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Public Property salarioBrutoS() As Double
        Get
            Return m_salarioBruto
        End Get
        Set(ByVal p_salarioBruto As Double)
            m_salarioBruto = p_salarioBruto
        End Set
    End Property

    ''' <summary>
    ''' Set/Get salario neto del empleado
    ''' </summary>
    ''' <value>Salario neto</value>
    ''' <returns>Double</returns>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Public Property salarioNetoS() As Double
        Get
            Return m_salarioNeto
        End Get
        Set(ByVal p_salarioNeto As Double)
            m_salarioNeto = p_salarioNeto
        End Set
    End Property

    ''' <summary>
    ''' Set/Get del valor de las bonificaciones
    ''' </summary>
    ''' <value>Valor de la bonificaciones</value>
    ''' <returns>Double</returns>
    ''' <remarks>Creador por: Stephan Endres, Fecha: 24/06/2010, Modificado: 24/06/2010.</remarks>
    Public Property bonoValorS() As Double
        Get
            Return m_bonoValor
        End Get
        Set(ByVal p_bonoValor As Double)
            m_bonoValor = p_bonoValor
        End Set
    End Property

End Class
